APPENDIX A 



/* 

* (C) Copyright 2 000 by OnMercial.com, Inc. 

* All rights reserved 
* 

* General pixel encoding routine. 
* 

* The routine ac_out is a standard range encoder. The routine UpdateModel 

* is responsible for updating the model to reflect the new probability 

* values given the color of the current pixel. 
*/ 

int Amf Coder :: encode ( int a_y, int a_x) { 
/* 

* pc is the index into the color palette for the current pixel. 

* pi is the index into the color palette for the left neighbor pixel. 

* plu is the index into the color. palette for the upper neighbor pixel. 

* ptr is a two-dimensional array storing the indices into the color 

* palette in the image . 

*/ 

int pc; 
int pi; 
int pu; 
int ptr; 

/* 

* Identify the index into the color palette for the current pixel. 
*/ 

pc-(*frame) (a_x,a_y) ; 

/* 

* Assert the proposition that the index into the color palette for the 

* current pixel is a valid index (i.e., not out of bounds) . 
*/ 

assert (pc<pal_size+l) ; 

/* 

* Identify the indices into the color palette for the upper neighbor. 
*/ 

if (a_y> frame - >y0 ) { 

pu=(*frame) (a_x,a_y-l) ; 
} else { 

/* 

* Use the index in the color palette for the transparent color to indicate 

* that the current pixel is in the top row of the image. 
*/ 

pu=pal_size ; 

} 

/* 

* Identify the indices into the color palette for the left neighbor. 
*/ 

if ( a_x> frame ->x0) { 

pl=(*frame) (a_x-l,a_y) ; 
} else { 

/* 

* Use the index in the color palette for the transparent color to indicate 

* that the current pixel is in the top row of the image. 
*/ 

pl=pal_size ; 

} 

/* 

* Encode the current pixel. 
* 
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* Mode 1: The left and upper pixels have the same color. 
*/ 

if (pu==pl) { 

/* 

* Determine the proper offsets into the frq_eq array for the current 

* probability model. 
*/ 

ptr=3*context; 

/* 

* Mode la: The current pixel has the same color as the left and upper 

* neighbors. 
*/ 

if (pl==pc) { 

/* 

* Encode the mode and update the model. 
*/ 

coder- >ac_out (frq_eq [ptr+O] , f rq_eq [ptr+1] , f rq_eq [ptr+2 ] ) ; 
UpdateModel (ptr+f rq_eq, 2,0, ALEVEL) ; 

/* 

* Select the proper model for the next pixel . 
*/ 

context =0 ; 

/* 

* Mode lb: The current pixel has a different color than the left and upper 

* neighbors . 
*/ 

} else { 

/* 

* Encode the mode and the index into the color palette for the current 

* pixel, and update the model. 
*/ 

coder- >ac_out (f rq_eq [ptr+1] , f rq_eq [ptr+2] , f rq_eq [ptr+2] ) ; 
encode_0 (pi , pi , pc) ; 

UpdateModel (ptr+f rq_eq, 2 , 1 , ALEVEL) ; 

/* 

* Select the proper model for the next pixel . 
*/ 

context=l ; 

} 

/* 

* Mode 2: The left and upper pixels have different colors. 
*/ 

} else { 

/* 

* Determine the proper offsets into the frq_ne array for the current 

* probability model . 
*/ 

ptr=4*context ; 

/* 

* Mode 2a: The current pixel has the same color as the left neighbor only. 
*/ 

if (pi == pc) { 

/* 

* Encode the mode and update the model. 
*/ 

coder- >ac_out (f rq_ne [ptr+0] , f rq_ne [ptr+1] , f rq_ne [ptr+3] ) ; 
UpdateModel (ptr+f rq_ne, 3 , 0 , ALEVEL2 ) ; 

/* 

* Select the proper model for the next pixel . 
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*/ 

context -2 ; 

/* 

* Mode 2b: The current pixel has the same color as the upper neighbor 

* only. 
*/ 

} else if (pu == pc) { 

/* 

* Encode the mode and update the model . 
*/ 

coder->ac_out (f rq_ne [ptr+1] , f rq_ne [ptr+2] , f rq_ne [ptr+3] ) ; 
UpdateModel (ptr+f rq_ne ,3,1, ALEVEL2 ) ; 

/* 

* Select the proper model for the next pixel . 
*/ 

context=3 ; 

/* 

* Mode 2c: The current pixel has a different color than the left and upper 

* neighbors. 

*/ 

} else { 

/* 

* Encode the mode and the index into the color palette for the current 

* pixel, and update the model. 
*/ 

coder ->ac__out (f rq_ne [ptr+2] , f rq_ne [ptr+3] , f rq_ne [ptr+3] ) ; 
UpdateModel (ptr+f rq_ne, 3 , 2 , ALEVE L 2 ) ; 
encode_0 (pi , pu , pc ) ; 

/* 

* Select the proper model for the next pixel . 

*/ 

context=4 ; 

} 

} 

return 0 ; 

} 



/* 

* Encoding routine for encoding the current pixel when the current pixel 

* has a color different from both the left and upper neighbors . 
*/ 

int Amf Coder :: encode_0 ( int a_l , int a_u, int a_c) { 
/* 

* xl marks the low end of the range of probability values for a color 

* in the color palette. 

* xh marks the high end of the range of probability values for a color 

* in the color palette. 

* xtot stores the total number of occurrences of each color in the 

* color palette . 
*/ 

U16B xl; 
U16B Xh; 
U16B xtot; 

U16B i; 

/* 

* Initialize the low end of the range of probability values for the first 

* color in the color palette. 
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*/ 

Xl = 0; 

/* 

* Calculate the total number of occurrences of each color in the color 

* palette. 
*/ 

xtot=frq_0 [pal_size+l] ; 

/* 

* Exclude from the total number of occurrences of each color in the color 

* palette the number of occurrences of the colors of the left and upper 

* neighbors . 
*/ 

xtot -= f rq_0 [a_l ] ; 

/* 

* Only exclude the number of occurrences of the color of the upper 

* neighbor if it is different from the color of the left neighbor (i.e., 

* we are not in mode 1) . 
*/ 

if (a_l != a_u) { 

xtot -= frq_0 [a_u] ; 

} 

/* 

* Scan through the colors in the color palette. 
*/ 

for (i=0; i<pal_size+l; i++) { 

/* 

* Ignore the colors or the left and upper neighbors. 
*/ 

if (i==a_l | | i==a_u) { 
continue; 

} 

/* 

* Set the high end of the range of probability values for the current 

* color to be the low end of the range of probability values for the 

* current color plus the number of occurrences of the current color. 

*/ 

xh=xl+f rq_0 [i] ; 

/* 

* If the current color is that of the current pixel, encode the current 

* color and update the model (including the number of occurrences of each 

* color in the color palette) . 
*/ 

if (i==a_c) { 

coder- >ac_out (xl , xh, xtot); 

UpdateModel2 (frq_0, (U16B) (pal_size+l) , i , ALEVELO ) ; 

/* 

* Break out of the for- loop. 
*/ 

break; 

} 

/* 

* Set the low end of the range of probability values for the next color to 

* be the high end of the range of probability values for the current 

* color. 
*/ 

xl=xh; 

} 

return 0; 

} 
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